home *** CD-ROM | disk | FTP | other *** search
/ The Fatted Calf / The Fatted Calf.iso / Applications / UUCP / UUCon / Source / EnhancedApp.m < prev    next >
Text File  |  1992-09-14  |  1KB  |  52 lines

  1. /*
  2.  
  3.   Ronin Consulting, Inc.
  4.     Copyright (C) 1992, Nicholas Christopher (nwc@gun.com)
  5.  
  6.     This library is free software; you can redistribute it and/or
  7.     modify it under the terms of the GNU Library General Public
  8.     License as published by the Free Software Foundation; either
  9.     version 2 of the License, or (at your option) any later version.
  10.  
  11.     This library is distributed in the hope that it will be useful,
  12.     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14.     Library General Public License for more details.
  15.  
  16.     You should have received a copy of the GNU Library General Public
  17.     License along with this library; if not, write to the Free
  18.     Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19.  
  20. */
  21. #import "EnhancedApp.h"
  22. #import <defaults/defaults.h>
  23. #import <sys/param.h>
  24. #import <string.h>
  25. #import <libc.h>
  26.  
  27. @implementation Application (EnhancedApp)
  28.  
  29. - (const char *) appDirectory
  30. {
  31.    static char appDirectory[MAXPATHLEN + 1] = { '\0' };
  32.    char *ptr;
  33.  
  34.    if(!appDirectory[0])
  35.    {
  36.       strcpy(appDirectory, NXArgv[0]);
  37.       if(ptr = rindex(appDirectory, '/'))
  38.       *ptr = (char)0;
  39.  
  40.       if(appDirectory)
  41.       chdir(appDirectory);
  42.  
  43.       getwd(appDirectory);
  44.    }
  45.  
  46.    return appDirectory;
  47. }
  48.  
  49. @end
  50.  
  51.  
  52.